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! FORTRAN Run-Time Library s spegitic macros and symbols 
: File: FORLIB.REQ, Edit: S$BL100 


leeeeerereerereereerereeeeereeeeeteeeeeneeeeeeeeeeeeeerereeeeeeeenenerereeese 
' 


ie COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
ie DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ie ALL RIGHTS RESERVED. 


'* THIS SOFTWARE IS FURNISHED ace A_LICENSE AND MAY BE USED AND correo 
'* ONLY IN ACCORDANCE WITH THE ey OF SUCH Tint AND WITH THE 
'* INCLUSION OF a Fl VE COPYRIGHT NOTIC E THIS SOFTWARE OR ANY OTHER 
te COPIES THEREOF MA oa BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
:: a 3 a a TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


ie@ THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
: CORPOKA ie NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


ie DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
!@ SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


aeepeneeeeaneeeneneneeneneaeaenene 


VeRO eee AH AREA EHAAAEEHATEAEAEAAAERAAAAEAAEH RAH RAAKe eee eeeeeeeeeeeeeeee 
' 
! Author: Steven B. Lionel, 23-September-1982 
i 1-001 = Original. SBL 23~September- 1982 
-Mar-1983 


; 
' 
i 1-002 = Add FORMACROS REQ r 
i 1-003 = Add FORRCE.R32. SBL 2-Jun-1983 | 


This file is the master source for FORLIB.L32. 

! It contains definitions for macros and symbols used internally to the 
+ FORTRAN Run-Time Library. | 
SWITCHES ADDRESSING_MODE (EXTERNAL=GENERAL, NONEXTERNAL=WORD_RELATIVE); 

LIBRARY "RTLSTARLE’; SYSSLIBRARY : STARLET.L32 | 
REQUIRE *RTLML:FORERR'; FORSK_ error codes 

REQUIRE "RTILIN:FORFMT'; FORMAT codes and fields 

REQUIRE *RTLIN:FORMACROS'; FORTRAN=specific macros 

REQUIRE ‘RTLML:FORMSG'; FORS$_ error codes 
REQUIRE *RTLIN:FORNML'; NAMELIST definitions 
REQUIRE *RTLIN:FOROPN'; OPEN definitions 
REQUIRE ‘RTLML:FORPAR'; ! Assorted definitions 
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REQUIRE *RTLML:FORRCE'; ! RFA Cache Entry structure 

REQUIRE "RTILML:OTSISB.BLF’; ! Intra-statement block definitions 
UNDECLARE ZQUOTE ISB; 

REQUIRE ‘*RTLML:OTSLUB.BLF'; ! Logical Unit Block definitions 
UNDECLARE ZQUOTE LUB; 

te 


! Define macro that declares the CCB structure. Note that it has no 
; allocation size - it must be used in a REF declaration. 


CRO 
SFORSCCB_DECL = BLOCK C, BYTE] FIELD (LUBSFIELDSET, ISBSFIELDSET) %; 


REQUIRE *RTLIN:OTSCCBREQ'; ! OTS CCB data structure definitions 
' (Must come after OTSISB and OTSLUB) 

REQUIRE "RTLIN:OTSLNK'; ! Common Linkage definitions 

REQUIRE "RTLIN:OTSMAC'; ! Common macros 


! End of file FORLIB.REQ 
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